home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
How Would You Survive?
/
How Would You Survive (1995)(Grolier)[Mac-PC].iso
/
mac
/
AZTECW.DIR
/
01699_Script_YOUR family
< prev
next >
Wrap
Text File
|
1995-09-12
|
9KB
|
289 lines
global gQuest, gBeenClicked, gHouseIsOpen
on AFamilyRollovers1
set gBeenClicked = 0
if (not(CheckClickedStatus(gQuest))) then
if rollover(6) then
repeat while rollover(6)
AztecCursor
puppetsprite 11, true
set the locH of sprite 11 to 291
set the locV of sprite 11 to 308
updatestage
if the mousedown then
set GBeenClicked = 1
else
if gBeenClicked = 1 then
repeat while gBeenClicked = 1
AnimateLoopFast 6, 285, 4, "SA161300.AIF", 3
end repeat
end if
end if
end repeat
set the locH of sprite 11 to 991
puppetsprite 11, false
updatestage
else
if rollover(7) then
ArrowCursor
repeat while rollover(7)
set the locH of sprite 8 to 506
set the locV of sprite 8 to 299
updatestage
end repeat
else
if rollover(9) then
ArrowCursor
repeat while rollover(9)
set the locH of sprite 10 to 382
set the locV of sprite 10 to 325
updatestage
end repeat
set the locH of sprite 10 to 982
updatestage
else
if rollover(40) then
HandCursor
else
if rollover(41) then
HandCursor
else
if rollover(42) then
HandCursor
else
ArrowCursor
end if
end if
end if
end if
end if
end if
end if
RandomQuestion(gQuest)
end
on AFamilyRollovers2
set gBeenClicked = 0
if (not(CheckClickedStatus(gQuest))) then
if rollover(6) then
repeat while rollover(6)
AztecCursor
puppetsprite 9, true
set the locH of sprite 9 to 314
set the locV of sprite 9 to 276
updatestage
if the mousedown then
set GBeenClicked = 1
else
if gBeenClicked = 1 then
repeat while gBeenClicked = 1
AnimateLoopFast 6, 289, 3, "SA161500.AIF (DIGGING)", 2
end repeat
end if
end if
end repeat
set the locH of sprite 9 to 914
puppetsprite 9, false
updatestage
else
if rollover(7) then
ArrowCursor
repeat while rollover(7)
set the locH of sprite 8 to 538
set the locV of sprite 8 to 317
updatestage
end repeat
set the locH of sprite 8 to 938
updatestage
else
if rollover(39) then
HandCursor
else
if rollover(40) then
HandCursor
else
if rollover(41) then
HandCursor
else
if rollover(42) then
HandCursor
else
ArrowCursor
end if
end if
end if
end if
end if
end if
end if
RandomQuestion(gQuest)
end
on AFamilyRollovers3
set gBeenClicked = 0
if (not(CheckClickedStatus(gQuest))) then
if rollover(5) then
set the locH of sprite 12 to 800
puppetsprite 12, false
updatestage
repeat while rollover(5)
AztecCursor
puppetsprite 8, true
set the locH of sprite 8 to 387
set the locV of sprite 8 to 297
updatestage
if the mousedown then
set GBeenClicked = 1
else
if gBeenClicked = 1 then
repeat while gBeenClicked = 1
AnimateLoopFast 6, 292, 5, "SA160900.AIF", 1
end repeat
end if
end if
end repeat
set the locH of sprite 8 to 987
puppetsprite 8, false
updatestage
else
if rollover(7) then
set the locH of sprite 12 to 800
puppetsprite 12, false
updatestage
repeat while rollover(7)
AztecCursor
-- puppetsprite 8, true
-- set the locH of sprite 8 to 387
-- set the locV of sprite 8 to 297
-- updatestage
if the mousedown then
set GBeenClicked = 1
else
if gBeenClicked = 1 then
repeat while gBeenClicked = 1
AnimateLoop 7, 297, 6, "SA161001.AIF (BATH)", 1
end repeat
end if
end if
end repeat
else
if rollover(9) then
set the locH of sprite 8 to 800
puppetsprite 8, false
updatestage
ArrowCursor
repeat while rollover(9)
puppetsprite 12, true
set the locH of sprite 12 to 293
set the locV of sprite 12 to 106
set the locH of sprite 10 to 210
set the locV of sprite 10 to 170
updatestage
end repeat
else
if rollover(13) then
set the locH of sprite 8 to 800
puppetsprite 8, false
updatestage
ArrowCursor
repeat while rollover(13)
puppetsprite 12, true
set the locH of sprite 12 to 293
set the locV of sprite 12 to 106
set the locH of sprite 14 to 293
set the locV of sprite 14 to 170
updatestage
end repeat
else
if rollover(15) then
set the locH of sprite 8 to 800
puppetsprite 8, false
updatestage
ArrowCursor
repeat while rollover(15)
puppetsprite 12, true
set the locH of sprite 12 to 293
set the locV of sprite 12 to 106
set the locH of sprite 16 to 211
set the locV of sprite 16 to 262
updatestage
end repeat
else
if rollover(17) then
set the locH of sprite 8 to 800
puppetsprite 8, false
updatestage
ArrowCursor
repeat while rollover(17)
puppetsprite 12, true
set the locH of sprite 12 to 293
set the locV of sprite 12 to 106
set the locH of sprite 18 to 293
set the locV of sprite 18 to 261
updatestage
end repeat
else
if rollover(19) then
set the locH of sprite 8 to 800
puppetsprite 8, false
updatestage
ArrowCursor
repeat while rollover(19)
puppetsprite 12, true
set the locH of sprite 12 to 293
set the locV of sprite 12 to 106
set the locH of sprite 20 to 209
set the locV of sprite 20 to 370
updatestage
end repeat
set the locH of sprite 20 to 909
updatestage
else
if rollover(21) then
set the locH of sprite 8 to 800
puppetsprite 8, false
updatestage
ArrowCursor
repeat while rollover(21)
puppetsprite 12, true
set the locH of sprite 12 to 293
set the locV of sprite 12 to 106
set the locH of sprite 22 to 293
set the locV of sprite 22 to 370
updatestage
end repeat
set the locH of sprite 22 to 993
updatestage
else
if rollover(39) then
HandCursor
else
ArrowCursor
end if
end if
end if
end if
end if
end if
end if
end if
end if
end if
RandomQuestion(gQuest)
end
on ResetYourFamily
set the locH of sprite 12 to 800
set the locH of sprite 8 to 800
puppetsprite 8, false
puppetsprite 12, false
updatestage
end
